#!usr/local/bin/perl -w
#exercice 2

# Création des variables $var1, $var2 et $var3 auxquelles on effectuent  les valeurs 33, 44 et 55 respectivement
$var1 = 33;
$var2 = 44;
$var3 = 55;

# Affichage des trois variables
print " $var1 \n $var2 \n $var3 \n ";

# La somme des variables + affichages
$somme = $var1 + $var2;
print "\$var1 + \$var2 = $somme\n";
$somme = $var1 + $var3;
print " \$var1 + \$var3 = $somme\n";
$somme = $var2 + $var1;
print " \$var2 + \$var1 = $somme\n";
$somme = $var2 + $var3;
print " \$var2 + \$var3 = $somme\n";
$somme = $var3 + $var1;
print " \$var3 + \$var1 = $somme\n";
$somme = $var3 + $var2;
print " \$var3 + \$var2 = $somme\n";

# Les produits des variables + affichages
$produit = $var1 * $var2;
print " \$var1 * \$var2 = $produit\n";
$produit = $var1 * $var3;
print " \$var1 * \$var3 = $produit\n";
$produit = $var2 * $var1;
print " \$var2 * \$var1 = $produit\n";
$produit = $var2 * $var3;
print " \$var2 * \$var3 = $produit\n";
$produit = $var3 * $var1;
print " \$var3 * \$var1 = $produit\n";
$produit = $var3 * $var2;
print " \$var3 * \$var2 = $produit\n";

#permutation des variables $var1, $var2 et $var3
$temp = $var1;
$var1 = $var2;
$var2 = $var3;
$var3 = $temp;
#affichage des variables aprés permutation
print " $var1 \n $var2 \n $var3 \n ";